home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Libris Britannia 4
/
science library(b).zip
/
science library(b)
/
PROGRAMM
/
DB_CLIPP
/
1159.ZIP
/
DATABACK.PRG
< prev
next >
Wrap
Text File
|
1986-07-22
|
2KB
|
45 lines
N=VAL(NCHR)
DO CASE
CASE N=1
RUN FASTBACK A: DATA1.DBF DATA1SN.* DATA1TV.* DATAOPTN.DBF DATANAME.MEM
CASE N=2
RUN FASTBACK A: DATA2.DBF DATA2SN.* DATA2TV.* DATAOPTN.DBF DATANAME.MEM
CASE N=3
RUN FASTBACK A: DATA3.DBF DATA3TV.* DATA3SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=4
RUN FASTBACK A: DATA4.DBF DATA4TV.* DATA4SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=5
RUN FASTBACK A: DATA5.DBF DATA5TV.* DATA5SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=6
RUN FASTBACK A: DATA6.DBF DATA6TV.* DATA6SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=7
RUN FASTBACK A: DATA7.DBF DATA7TV.* DATA7SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=8
RUN FASTBACK A: DATA8.DBF DATA8TV.* DATA8SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=9
RUN FASTBACK A: DATA9.DBF DATA9TV.* DATA9SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=10
RUN FASTBACK A: DATA10.DBF DATA10TV.* DATA10SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=11
RUN FASTBACK A: DATA11.DBF DATA11TV.* DATA11SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=12
RUN FASTBACK A: DATA12.DBF DATA12TV.* DATA12SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=13
RUN FASTBACK A: DATA13.DBF DATA13TV.* DATA13SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=14
RUN FASTBACK A: DATA14.DBF DATA14TV.* DATA14SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=15
RUN FASTBACK A: DATA15.DBF DATA15TV.* DATA15SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=16
RUN FASTBACK A: DATA16.DBF DATA16TV.* DATA16SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=17
RUN FASTBACK A: DATA17.DBF DATA17TV.* DATA17SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=18
RUN FASTBACK A: DATA18.DBF DATA18TV.* DATA18SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=19
RUN FASTBACK A: DATA19.DBF DATA19TV.* DATA19SN.* DATAOPTN.DBF DATANAME.MEM
CASE N=20
RUN FASTBACK A: DATA20.DBF DATA20TV.* DATA20SN.* DATAOPTN.DBF DATANAME.MEM
ENDCASE
RETURN